home *** CD-ROM | disk | FTP | other *** search
/ Quick PC 62 / Quick PC 62.iso / I386 / IIS5_01.CAB / IIS_IIHELP.ASP < prev    next >
Encoding:
Text File  |  1999-06-03  |  956 b   |  38 lines
  1. <%@ LANGUAGE = VBScript %>
  2. <% Option Explicit %>
  3. <!-- #include file="directives.inc" -->
  4.  
  5. <!--#include file="iihelp.str"-->
  6. <%
  7.  
  8. On Error Resume Next
  9.  
  10. Dim pg
  11. pg="HTTP://" + Request.QueryString("pg")
  12. %>
  13.  
  14. <SCRIPT LANGUAGE="JavaScript">
  15. function setUpHandlers() {
  16.     <% if Session("IsIE") then %>
  17.         window.onblur = new Function("window.focus();")
  18.         window.focus();
  19.     <% else %>
  20.         <% if (CInt(Session("BrowserVer")) >= 4) then %>
  21.        main.onblur=new Function("main.focus();")
  22.        main.focus();
  23.         <% end if %>
  24.    <% end if %> 
  25. }
  26. </SCRIPT>
  27.  
  28. <HTML>
  29. <HEAD>
  30. <TITLE><%= (L_TITLE_TEXT) %></TITLE>
  31. </HEAD>
  32.  
  33. <FRAMESET ROWS="0,*" BORDER=NO FRAMESPACING=0 FRAMEBORDER=0 onLoad="setUpHandlers();">
  34.     <FRAME SRC="blank.htm" NAME="pad" SCROLLING=NO FRAMESPACING=0 BORDER=NO  MARGINHEIGHT=0 MARGINWIDTH=0 SCROLLING=NO>
  35.     <FRAME SRC="<%=pg %>" NAME="main" BORDER=NO FRAMESPACING=0 FRAMEBORDER=0 MARGINHEIGHT=0 MARGINWIDTH=0>
  36. </FRAMESET>
  37.  
  38. </HTML>